﻿
Partial Class Hosteria_VS_Default
    Inherits System.Web.UI.Page

    Protected Sub btnBuscar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnBuscar.Click
        Dim rows As Data.DataSet
        rows = SqlDataSource1.Select(DataSourceSelectArguments.Empty)

    End Sub

    Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Calendar1.SelectionChanged
        txtFecha.Text = Calendar1.SelectedDate.ToShortDateString
    End Sub
End Class
